(simula-electric-keyword): Pass proper format string to message.

diff --git a/lisp/progmodes/simula.el b/lisp/progmodes/simula.el
index 6a3319a5bab130c402ec75505c8b9403867f22b5..45cb24b331d4c6e8c3bec8b3ef887cd982152262 100644 (file)
--- a/lisp/progmodes/simula.el
+++ b/lisp/progmodes/simula.el
@@ -987,11 +987,10 @@ If COUNT is negative, move backward instead."
                               (simula-backward-up-level 1)
                               (if (pos-visible-in-window-p)
                                   (sit-for 1)
-                                (message
-                                 (concat "Matches "
+                                (message "Matches %s"
                                          (buffer-substring
                                           (point)
-                                          (+ (point) (window-width))))))))
+                                          (+ (point) (window-width)))))))
                         (skip-chars-backward " \t\f")
                         (bolp)))
                  (let ((indent (simula-calculate-indent)))